CAAMoon_MeanLongitudePerigee <-
function(JD){
.Call("CAAMoon_MeanLongitudePerigee", JD)
}
